home *** CD-ROM | disk | FTP | other *** search
/ Zoom 2 / Zoom - Release 2 (1996)(Active Software)[!].iso / utilities / misc / prozodiac / install_pz2000 < prev    next >
Text File  |  1995-11-07  |  3KB  |  90 lines
  1. ;******************************
  2. ;  Title:
  3. ;     ProZodiac_2000
  4. ;------------------------------
  5. ;  Author:
  6. ;     Frederic Cuccarolo
  7. ;------------------------------
  8. ;  Date:
  9. ;     Febuary 27,1995.
  10. ;******************************
  11.  
  12. (set diskname "ProZodiac_2000:" )
  13. (welcome "\n  Welcome to the ProZodiac_2000 installer.\n")
  14.  
  15. (if (< (/ (getversion) 65536) 37)
  16.  (abort ("\nYou need OS2.04 or higher to run ProZodiac_2000 !!!") )
  17.  ((message "\n\n\nTo install ProZodiac_2000 to your Harddrive, you will need about 250 Kb." )
  18.   (complete 0)
  19.   (set @default-dest
  20.      (askdir (prompt 
  21. "Select a directory or volume name where  ProZodiac_2000 "
  22. "should be installed. Keep in mind that this script will "
  23. "create a directory called \"ProZodiac\"." )
  24.              (help @askdir-help)
  25.              (default @default-dest) ) )
  26.   (if (<> "ProZodiac" (fileonly @default-dest) )
  27.    ((set @default-dest (tackon @default-dest "ProZodiac") )
  28.     (makedir (@default-dest) (infos) ) ) )
  29.   (complete 1)
  30.  
  31.   (working "Copying ProZodiac_2000 program.")
  32.   (copyfiles (prompt "Copy this program.")
  33.              (help @copyfiles-help)
  34.              (source diskname)
  35.              (dest @default-dest)
  36.              (choices "PZ2000_Demo" "ProZodiac.guide")
  37.              (infos)
  38.              (confirm) )
  39.   (complete 48)
  40.  
  41.  
  42.   (working "Copying ProZodiac_2000 modules.")
  43.   (copyfiles (prompt "Copy these ProZodiac_2000 modules & files.")
  44.              (help @copyfiles-help)
  45.              (source diskname)
  46.              (dest @default-dest)
  47.          (choices "pzCHA" "pzCHB" "pzCHC" "pzcalc" "pzprefs")
  48.          (confirm) )
  49.   (complete 75)
  50.  
  51.   (working "Copying ProZodiac_2000 Fonts.")
  52.   (copyfiles (prompt "Copy these ProZodiac_2000 Fonts.")
  53.              (help @copyfiles-help)
  54.              (source (tackon diskname "Fonts"))
  55.              (dest "Fonts:")
  56.          (fonts)
  57.          (all)
  58.          (confirm) )
  59.    (complete 95)
  60.   (working "Making ProZodiac_2000 directories.")
  61.   (makedir (tackon @default-dest "names")
  62.        (prompt "I will now creat the directory \"ProZodiac:names\"")
  63.        (help @makedir-help)
  64.        (confirm) )
  65.  
  66.   (working "Making ProZodiac_2000 directories.")
  67.   (makedir (tackon @default-dest "interp")
  68.        (prompt "I will now creat the directory \"ProZodiac:interp\"")
  69.        (help @makedir-help)
  70.        (confirm) )
  71.  
  72.   (working "Making ProZodiac_2000 directories.")
  73.   (makedir (tackon @default-dest "places")
  74.        (prompt "I will now creat the directory \"ProZodiac:places\"")
  75.        (help @makedir-help)
  76.        (confirm) )
  77.   (complete 98)
  78.  
  79.   (set PZassign ("Assign ProZodiac_2000: \"%s\"\n" @default-dest))
  80.   (startup "ProZodiac_2000"
  81.        (prompt "Some instructions to be added to the \"S:user-startup\" so that your system will be properly configured to use ProZodiac_2000.\n\n"
  82.         PZassign 
  83.                "\nIs it okay to add this now?"
  84.             "\n\nIMPORTANT: REBOOT YOUR COMPUTER BEFORE RUNNING ProZodiac_2000 FOR THE FIRST TIME.")
  85.          (help @startup-help)
  86.        (command PZassign) )
  87.   (complete 100)
  88.  )
  89. )
  90.